Amiga Format CD 42

home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 42 / Amiga Format AFCD42 (Issue 126, Aug 1999).iso / -serious- / programming / basic / newcommandset_v1.80 / examples / xpk.bb2 < prev
Unknown | 1999-05-14 | 2.0 KB
view JSON data |
view as text |
open on a Mac |
open on a PC

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`100%`	file	data	default
`100%`	TrID	Flexible Line Interpretation bitmap	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 3b 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.; *****|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 3b 20 20 |********|****.;  |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000050| 20 20 20 20 20 4e 65 77 | 20 58 50 4b 20 4c 69 62 |     New| XPK Lib|
|00000060| 72 61 72 79 00 3b 20 20 | 20 20 43 6f 64 65 64 20 |rary.;  |  Coded |
|00000070| 62 79 20 41 6c 70 68 61 | 53 4f 55 4e 44 20 2d 20 |by Alpha|SOUND - |
|00000080| 28 63 29 20 31 39 39 39 | 20 46 61 6e 74 61 69 73 |(c) 1999| Fantais|
|00000090| 69 65 20 73 6f 66 74 77 | 61 72 65 00 3b 20 2a 2a |ie softw|are.; **|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 2a 2a 00 | 00 3b 20 2a 2a 2a 2a 2a |*******.|.; *****|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000110| 2a 2a 2a 2a 00 3b 20 20 | 20 20 20 20 20 20 20 20 |****.;  |        |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 45 78 61 6d 70 |        |   Examp|
|00000130| 6c 65 20 31 00 3b 20 20 | 20 20 44 6f 20 61 6c 6c |le 1.;  |  Do all|
|00000140| 20 58 50 4b 20 53 74 61 | 6e 64 61 72 64 20 73 74 | XPK Sta|ndard st|
|00000150| 75 66 66 73 2e 2e 2e 20 | 57 69 74 68 20 65 61 73 |uffs... |With eas|
|00000160| 65 20 21 00 3b 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |e !.; **|********|
|00000170| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 00 |********|*******.|
|000001a0| 3b 00 3b 20 31 37 2f 30 | 34 2f 31 39 39 39 00 3b |;.; 17/0|4/1999.;|
|000001b0| 20 20 20 43 68 61 6e 67 | 65 64 20 61 20 62 69 74 |   Chang|ed a bit|
|000001c0| 00 3b 20 20 20 52 65 6d | 6f 76 65 64 20 61 20 62 |.;   Rem|oved a b|
|000001d0| 69 67 20 65 6e 66 6f 72 | 63 65 72 20 68 69 74 00 |ig enfor|cer hit.|
|000001e0| 3b 00 00 80 c3 00 00 52 | 65 73 75 6c 74 2e 6c 20 |;......R|esult.l |
|000001f0| 3d 20 d9 0e 00 00 dd 82 | 20 22 42 75 69 6c 64 20 |= ......| "Build |
|00000200| 75 70 20 6f 75 72 20 54 | 65 73 74 46 69 6c 65 2e |up our T|estFile.|
|00000210| 2e 2e 22 00 3b 20 53 65 | 74 74 69 6e 67 20 75 70 |..".; Se|tting up|
|00000220| 20 6f 75 72 20 74 65 73 | 74 20 66 69 6c 65 2e 20 | our tes|t file. |
|00000230| 32 30 20 6b 62 20 6f 66 | 20 72 65 70 65 74 69 74 |20 kb of| repetit|
|00000240| 69 76 65 20 64 61 74 61 | 2e 2e 2e 00 3b 00 80 0b |ive data|....;...|
|00000250| 20 be 12 28 30 2c 20 22 | 72 61 6d 3a 4e 54 65 73 | ..(0, "|ram:NTes|
|00000260| 74 46 69 6c 65 22 29 00 | 20 20 be 07 20 30 00 00 |tFile").|  .. 0..|
|00000270| 20 20 80 16 20 6b 3d 31 | 20 80 18 20 32 30 30 30 |  .. k=1| .. 2000|
|00000280| 30 00 20 20 20 20 dd 81 | 20 d3 03 28 6b 29 00 20 |0.    ..| ..(k). |
|00000290| 20 80 17 00 20 20 be 02 | 20 30 00 80 c0 00 00 d2 | ...  ..| 0......|
|000002a0| 02 00 00 dd 82 20 22 4f | 6b 2e 2e 22 00 00 80 0b |..... "O|k.."....|
|000002b0| 20 52 65 73 75 6c 74 20 | 20 3b 20 4f 6b 2c 20 74 | Result | ; Ok, t|
|000002c0| 68 65 20 58 50 4b 4d 61 | 73 74 65 72 20 6c 69 62 |he XPKMa|ster lib|
|000002d0| 72 61 72 79 20 56 33 2e | 30 30 2b 20 20 69 73 20 |rary V3.|00+  is |
|000002e0| 66 6f 75 6e 64 20 61 6e | 64 20 6f 70 65 6e 65 64 |found an|d opened|
|000002f0| 2e 2e 00 20 20 dd 82 20 | 22 58 70 6b 2e 6c 69 62 |...  .. |"Xpk.lib|
|00000300| 72 61 72 79 20 56 33 2e | 30 30 2b 20 6f 70 65 6e |rary V3.|00+ open|
|00000310| 65 64 22 00 00 20 20 50 | 61 73 73 2e 73 20 20 20 |ed"..  P|ass.s   |
|00000320| 3d 20 22 22 20 20 20 3b | 20 4f 75 72 20 70 61 73 |= ""   ;| Our pas|
|00000330| 73 77 6f 72 64 20 66 6f | 72 20 61 6c 6c 20 74 68 |sword fo|r all th|
|00000340| 65 20 70 61 63 6b 2f 75 | 6e 70 61 6b 20 3a 2d 29 |e pack/u|npak :-)|
|00000350| 00 00 20 20 dd 82 20 22 | 50 61 63 6b 69 6e 67 20 |..  .. "|Packing |
|00000360| 74 68 65 20 74 65 73 74 | 66 69 6c 65 22 00 20 20 |the test|file".  |
|00000370| 4e 61 6d 65 31 2e 73 20 | 20 3d 20 22 52 61 6d 3a |Name1.s | = "Ram:|
|00000380| 4e 54 65 73 74 46 69 6c | 65 22 00 20 20 4e 61 6d |NTestFil|e".  Nam|
|00000390| 65 32 2e 73 20 20 3d 20 | 22 52 61 6d 3a 4e 54 65 |e2.s  = |"Ram:NTe|
|000003a0| 73 74 46 69 6c 65 2e 78 | 70 6b 22 00 20 20 50 61 |stFile.x|pk".  Pa|
|000003b0| 63 6b 65 72 2e 73 20 3d | 20 22 4e 55 4b 45 22 20 |cker.s =| "NUKE" |
|000003c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 4d |        |     ; M|
|000003d0| 79 20 66 61 76 6f 72 69 | 74 65 20 70 61 63 6b 65 |y favori|te packe|
|000003e0| 72 20 3a 2d 29 00 20 20 | 72 65 73 2e 6c 20 3d 20 |r :-).  |res.l = |
|000003f0| d9 02 28 26 4e 61 6d 65 | 31 2c 20 26 4e 61 6d 65 |..(&Name|1, &Name|
|00000400| 32 2c 20 26 50 61 63 6b | 65 72 2c 20 26 50 61 73 |2, &Pack|er, &Pas|
|00000410| 73 29 00 00 20 20 dd 82 | 20 22 55 6e 70 61 63 6b |s)..  ..| "Unpack|
|00000420| 69 6e 67 20 74 68 65 20 | 74 65 73 74 66 69 6c 65 |ing the |testfile|
|00000430| 22 00 20 20 4e 61 6d 65 | 31 2e 73 20 3d 20 22 52 |".  Name|1.s = "R|
|00000440| 61 6d 3a 4e 54 65 73 74 | 46 69 6c 65 2e 78 70 6b |am:NTest|File.xpk|
|00000450| 22 00 20 20 4e 61 6d 65 | 32 2e 73 20 3d 20 22 52 |".  Name|2.s = "R|
|00000460| 61 6d 3a 4e 54 65 73 74 | 46 69 6c 65 2e 75 6e 78 |am:NTest|File.unx|
|00000470| 70 6b 22 00 20 20 72 65 | 73 2e 6c 20 3d 20 d9 01 |pk".  re|s.l = ..|
|00000480| 28 26 4e 61 6d 65 31 2c | 20 26 4e 61 6d 65 32 2c |(&Name1,| &Name2,|
|00000490| 20 26 50 61 73 73 29 00 | 00 20 20 2a 4d 79 4d 65 | &Pass).|.  *MyMe|
|000004a0| 6d 20 3d 20 fe 97 28 31 | 30 30 30 30 2c 20 30 29 |m = ..(1|0000, 0)|
|000004b0| 00 20 20 80 0b 20 2a 4d | 79 4d 65 6d 00 20 20 20 |.  .. *M|yMem.   |
|000004c0| 20 44 65 73 74 4e 61 6d | 65 2e 73 20 3d 20 22 52 | DestNam|e.s = "R|
|000004d0| 61 6d 3a 4d 65 6d 50 61 | 63 6b 65 64 2e 78 70 6b |am:MemPa|cked.xpk|
|000004e0| 22 00 20 20 20 20 72 65 | 73 2e 6c 20 3d 20 d9 03 |".    re|s.l = ..|
|000004f0| 28 2a 4d 79 4d 65 6d 2c | 20 31 30 30 30 30 2c 20 |(*MyMem,| 10000, |
|00000500| 26 44 65 73 74 4e 61 6d | 65 2c 20 26 50 61 63 6b |&DestNam|e, &Pack|
|00000510| 65 72 2c 20 26 50 61 73 | 73 29 00 00 20 20 20 20 |er, &Pas|s)..    |
|00000520| fe 99 20 2a 4d 79 4d 65 | 6d 2c 20 31 30 30 30 30 |.. *MyMe|m, 10000|
|00000530| 00 20 20 80 c0 00 00 20 | 20 53 6f 75 72 63 65 4e |.  .... | SourceN|
|00000540| 61 6d 65 2e 73 20 3d 20 | 22 52 61 6d 3a 4d 65 6d |ame.s = |"Ram:Mem|
|00000550| 50 61 63 6b 65 64 2e 78 | 70 6b 22 00 20 20 2a 42 |Packed.x|pk".  *B|
|00000560| 75 66 41 64 64 72 2e 6c | 20 3d 20 d9 04 28 26 53 |ufAddr.l| = ..(&S|
|00000570| 6f 75 72 63 65 4e 61 6d | 65 2c 20 30 2c 20 26 50 |ourceNam|e, 0, &P|
|00000580| 61 73 73 29 00 20 20 80 | 0b 20 72 65 73 00 20 20 |ass).  .|. res.  |
|00000590| 20 20 dd 82 20 22 4d 65 | 6d 6f 72 79 20 61 64 64 |  .. "Me|mory add|
|000005a0| 72 65 73 73 65 20 6c 6f | 63 61 74 69 6f 6e 3a 22 |resse lo|cation:"|
|000005b0| 2c 20 2a 42 75 66 41 64 | 64 72 00 20 20 20 20 dd |, *BufAd|dr.    .|
|000005c0| 82 20 22 4f 72 69 67 69 | 6e 61 6c 20 46 69 6c 65 |. "Origi|nal File|
|000005d0| 4c 65 6e 3a 20 22 2c 20 | d9 05 00 20 20 20 20 dd |Len: ", |...    .|
|000005e0| 82 20 22 42 75 66 66 65 | 72 4c 65 6e 3a 20 22 2c |. "Buffe|rLen: ",|
|000005f0| 20 d9 06 00 00 20 20 20 | 20 fe 99 20 2a 42 75 66 | ....   | .. *Buf|
|00000600| 41 64 64 72 2c 20 d9 06 | 20 20 20 3b 20 44 6f 6e |Addr, ..|   ; Don|
|00000610| 27 74 20 46 6f 72 67 65 | 74 20 74 68 61 74 20 21 |'t Forge|t that !|
|00000620| 00 20 20 80 c0 00 00 20 | 20 dd 82 20 22 22 00 20 |.  .... | .. "". |
|00000630| 20 dd 82 20 22 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | .. "***|********|
|00000640| 2a 2a 20 4d 41 53 48 20 | 49 6e 66 6f 20 2a 2a 2a |** MASH |Info ***|
|00000650| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000660| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000670| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000680| 22 00 00 20 20 80 0b 20 | d9 07 28 22 4d 41 53 48 |"..  .. |..("MASH|
|00000690| 22 2c 20 31 30 30 29 20 | 3e 3d 20 30 00 20 20 20 |", 100) |>= 0.   |
|000006a0| 20 dd 82 20 d9 08 00 20 | 20 20 20 dd 82 20 d9 09 | .. ... |   .. ..|
|000006b0| 00 20 20 20 20 dd 82 20 | d9 0a 00 20 20 80 c0 00 |.    .. |...  ...|
|000006c0| 00 20 20 dd 82 20 22 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.  .. "*|********|
|000006d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000710| 2a 2a 22 00 20 20 dd 82 | 20 22 22 00 00 20 20 3b |**".  ..| ""..  ;|
|00000720| 20 48 65 72 65 20 77 65 | 20 67 65 74 20 61 6c 6c | Here we| get all|
|00000730| 20 74 68 65 20 70 61 63 | 6b 65 72 73 20 6c 69 73 | the pac|kers lis|
|00000740| 74 2e 2e 2e 00 20 20 3b | 00 20 20 d9 0b 00 00 20 |t....  ;|.  .... |
|00000750| 20 4e 75 6d 50 61 63 6b | 65 72 73 20 3d 20 d9 0c | NumPack|ers = ..|
|00000760| 00 20 20 dd 82 20 4e 75 | 6d 50 61 63 6b 65 72 73 |.  .. Nu|mPackers|
|00000770| 2c 20 22 20 70 61 63 6b | 65 72 73 20 61 76 61 69 |, " pack|ers avai|
|00000780| 6c 61 62 6c 65 3a 22 00 | 00 20 20 80 16 20 6b 3d |lable:".|.  .. k=|
|00000790| 30 20 80 18 20 4e 75 6d | 50 61 63 6b 65 72 73 2d |0 .. Num|Packers-|
|000007a0| 31 00 20 20 20 20 dd 81 | 20 d9 0d 2c 20 22 2c 20 |1.    ..| .., ", |
|000007b0| 22 00 20 20 80 17 00 20 | 20 dd 82 20 22 22 00 00 |".  ... | .. ""..|
|000007c0| 80 22 00 20 20 dd 82 20 | 22 55 6e 61 62 6c 65 20 |.".  .. |"Unable |
|000007d0| 74 6f 20 6f 70 65 6e 20 | 74 68 65 20 58 50 4b 4d |to open |the XPKM|
|000007e0| 61 73 74 65 72 2e 6c 69 | 62 72 61 72 79 20 56 33 |aster.li|brary V3|
|000007f0| 2e 30 30 2b 22 00 80 c0 | 00 00 dd 82 20 22 50 72 |.00+"...|.... "Pr|
|00000800| 65 73 73 20 6d 6f 75 73 | 65 20 74 6f 20 71 75 69 |ess mous|e to qui|
|00000810| 74 2e 22 00 00 d3 82 00 | 00 80 02 00             |t.".....|....    |
+--------+-------------------------+-------------------------+--------+--------+